home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 6: Level 6 / 17 Bit - Level 6 (1998)(Epic Marketing)[!].iso / quartz / q1099.dms / q1099.adf / MathPlot / Macros / test14.rexx < prev    next >
OS/2 REXX Batch file  |  1997-04-10  |  386b  |  20 lines
  1. /* test discussion */
  2. address "MPlot_ARexx"
  3. options results
  4.  
  5. setnumprecision 4
  6.  
  7. getpoints "cos(x) zero stem a."
  8. do i=0 to a.xpoints.count-1
  9. say i a.xpoints.i a.ypoints.i a.typ.i
  10. end
  11.  
  12. getpoints "cos(x) max stem a."
  13. do i=0 to a.xpoints.count-1
  14. say i a.xpoints.i a.ypoints.i a.typ.i
  15. end
  16.  
  17. getpoints "cos(x) turn stem a."
  18. do i=0 to a.xpoints.count-1
  19. say i a.xpoints.i a.ypoints.i a.typ.i
  20. end